home *** CD-ROM | disk | FTP | other *** search
/ Aminet 25 / Aminet 25 (1998)(GTI - Schatztruhe)[!][Jun 1998].iso / Aminet / mus / play / SongPlayer.lha / songplayer / arexx / Status.rexx < prev    next >
OS/2 REXX Batch file  |  1998-03-18  |  243b  |  17 lines
  1. /* Simple rexx test file for SongPlayer */
  2.  
  3. options results
  4. options FailAt 100
  5. address 'SONGPLAYER.1'
  6.  
  7. drop result
  8. get_time
  9. secs = result
  10. get_selected
  11. sel = result
  12. get_state
  13. sta = result
  14. say 'time='secs' secs  state='sta'  selected='sel
  15.  
  16. exit
  17.